setwd("D:/Data/My Books/INDC - Pemrograman-Pengenalan Bahasa Pemrograman R/source/Pengenalan.Bahasa.Pemrograman.R")

attach("usingR.RData")
attach(florida)
plot(BUSH, BUCHANAN, xlab="Bush", ylab="Buchanan")


attach(possum)
here <- sex == "f"
hist(totlngth[here], breaks = 72.5 + (0:5) * 5, ylim = c(0, 22), xlab="Total length", main ="A: Breaks at 72.5, 77.5, ...")

